% FWEAVE v1.30 (May 15, 1993)

\input fwebmac.sty

\Wbegin[]{article}{1em}{1em}{demo2.cts}{{\&}{\|}{\\}{\\}{\\}{\@}{\.}{\.}}

% --- Beginning of user's limbo section ---


\def\FWEB{\.{FWEB}} % A tex macro definition in the limbo section.



\WN1.  MIXING LANGUAGES. In \FWEB, languages can be mixed with a minimum of
effort.
\WY\WP \&{program} \1\\{main}\WIN1{0}\2\5
\WC{ In Fortran, a \&{program} statement should always    be used.  }\1\6
\&{call} \\{CRTN}\5
\Wc{ We'll actually do the work in a C~routine.}\2\6
\&{end}\7
\LANGUAGE{C} \WX2:C code\X C\X;\5
\Wc{ Link into the web a named module in~C.}\WY\par
\fi % End of module 1

\WM2. This is the start of the next section. At this point, the language has
reverted to the global language of Fortran. However, after the equals sign on
the next line the language is~C until the next section is encountered.
\WY\WP\4\4\WX2:C code\X C\X${}\WS{}$\7
\&{void} \1\\{CRTN}\WIN1{0}(\&{void})\2\1\6
${}\{{}$\5
\WC{ The code parts of the following named modules will be understood to be
in~C, since that is the current language when those names are first referenced.
}\6
\WX0:Compute\X \X;\6
\WX0:Graph\X \X;\6
${}\}$\2\WY\par
\WU section~1.\fi % End of module 2

\WN3.  INDEX.
\fi % End of module 3

\input demo2.ndx
\input demo2.mds

\Winfo{"fweave ./demo2 -zdemos.sty -=demo2.tex"}  {"./demo2.web"} {(none)}
 {FORTRAN}

\Wcon
